home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / Bonus / Plasmatech / ptscp_eval.exe / %MAINDIR% / EvalC4 / FPTAbout.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  2001-08-31  |  2.9 KB  |  91 lines

  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1999 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'FPTAbout.pas' rev: 4.00
  6.  
  7. #ifndef FPTAboutHPP
  8. #define FPTAboutHPP
  9.  
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #include <ShellAPI.hpp>    // Pascal unit
  13. #include <StdCtrls.hpp>    // Pascal unit
  14. #include <ExtCtrls.hpp>    // Pascal unit
  15. #include <DsgnIntf.hpp>    // Pascal unit
  16. #include <Dialogs.hpp>    // Pascal unit
  17. #include <Forms.hpp>    // Pascal unit
  18. #include <Controls.hpp>    // Pascal unit
  19. #include <Graphics.hpp>    // Pascal unit
  20. #include <Classes.hpp>    // Pascal unit
  21. #include <SysUtils.hpp>    // Pascal unit
  22. #include <Messages.hpp>    // Pascal unit
  23. #include <Windows.hpp>    // Pascal unit
  24. #include <SysInit.hpp>    // Pascal unit
  25. #include <System.hpp>    // Pascal unit
  26.  
  27. //-- user supplied -----------------------------------------------------------
  28.  
  29. namespace Fptabout
  30. {
  31. //-- type declarations -------------------------------------------------------
  32. class DELPHICLASS TPTFrmAbout;
  33. #pragma pack(push, 4)
  34. class PASCALIMPLEMENTATION TPTFrmAbout : public Forms::TForm 
  35. {
  36.     typedef Forms::TForm inherited;
  37.     
  38. __published:
  39.     Stdctrls::TLabel* CopyrightTxt;
  40.     Stdctrls::TLabel* ProductTxt;
  41.     Stdctrls::TLabel* VersionTxt;
  42.     Extctrls::TBevel* Bevel1;
  43.     Stdctrls::TButton* Button1;
  44.     Stdctrls::TButton* CloseBtn;
  45.     Extctrls::TPanel* Panel1;
  46.     Extctrls::TImage* Image1;
  47.     Extctrls::TPanel* Panel2;
  48.     void __fastcall Button1Click(System::TObject* Sender);
  49.     void __fastcall FormCreate(System::TObject* Sender);
  50.     
  51. public:
  52.     /*         class method */ static void __fastcall Execute(TMetaClass* vmt, AnsiString aProduct, AnsiString 
  53.         aYear, int aVersion, int aPatch);
  54.     /*         class method */ static void __fastcall ExecuteCtl(TMetaClass* vmt, AnsiString aProduct, 
  55.         AnsiString aYear, AnsiString aCtlName, int aVersion, int aPatch);
  56. public:
  57.     #pragma option push -w-inl
  58.     /* TCustomForm.Create */ inline __fastcall virtual TPTFrmAbout(Classes::TComponent* AOwner) : Forms::TForm(
  59.         AOwner) { }
  60.     #pragma option pop
  61.     #pragma option push -w-inl
  62.     /* TCustomForm.CreateNew */ inline __fastcall virtual TPTFrmAbout(Classes::TComponent* AOwner, int 
  63.         Dummy) : Forms::TForm(AOwner, Dummy) { }
  64.     #pragma option pop
  65.     #pragma option push -w-inl
  66.     /* TCustomForm.Destroy */ inline __fastcall virtual ~TPTFrmAbout(void) { }
  67.     #pragma option pop
  68.     
  69. public:
  70.     #pragma option push -w-inl
  71.     /* TWinControl.CreateParented */ inline __fastcall TPTFrmAbout(HWND ParentWindow) : Forms::TForm(ParentWindow
  72.         ) { }
  73.     #pragma option pop
  74.     
  75. };
  76.  
  77. #pragma pack(pop)
  78.  
  79. //-- var, const, procedure ---------------------------------------------------
  80. extern PACKAGE TPTFrmAbout* PTFrmAbout;
  81.  
  82. }    /* namespace Fptabout */
  83. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  84. using namespace Fptabout;
  85. #endif
  86. #pragma option pop    // -w-
  87.  
  88. #pragma delphiheader end.
  89. //-- end unit ----------------------------------------------------------------
  90. #endif    // FPTAbout
  91.